home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 05 - 1989 / 05.03 Mar 89 / calc source / MacCalc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1988-12-09  |  1.1 KB  |  51 lines  |  [TEXT/KAHL]
  1.  
  2. #include <WindowMgr.h>
  3. #include <ListMgr.h>
  4. #include <OSUtil.h>
  5. #include <EventMgr.h>
  6.  
  7. #include "MacCalc.h"
  8. #include "SheetHndlg.h"
  9. #include "CalcData.h"
  10. #include "parser.h"
  11.  
  12. main( ) 
  13. {
  14.         
  15.     DoInit( ) ;
  16.     DoEventLoop( ) ;
  17. }
  18. void DoEventLoop( )
  19. {
  20.     EventRecord ev ;
  21.     
  22.     while( !quit_flag ) {
  23.         SystemTask( ) ;
  24.         if( GetNextEvent( everyEvent, &ev ) ) {
  25.             switch( ev.what ) {
  26.             case mouseDown:
  27.                 DoMouseDown( &ev ) ;
  28.                 break ;
  29.             case mouseUp:
  30.                 break ;
  31.             case keyDown:
  32.                 break ;
  33.             case keyUp:
  34.                 break ;
  35.             case activateEvt:
  36.                 DoActivate( &ev ) ;
  37.                 break ;
  38.             case updateEvt:
  39.                 DoUpdate( &ev ) ;
  40.                 break ;
  41.             }
  42.         }else{
  43.             if( ( automatic_calculation || do_calc_now ) && calc_data ) {
  44.                 DoCalc( calc_hdl ) ;
  45.                 do_calc_now = FALSE ;
  46.                 calc_data = FALSE ;
  47.             }
  48.         }
  49.     }
  50.     return ;
  51. }